home *** CD-ROM | disk | FTP | other *** search
/ CyberMycha 2008 January / Cybermycha 1_2008.iso / Data.cab / _B2E293CEADD84B459FF7A351E20114ED < prev    next >
Encoding:
Text File  |  2004-03-17  |  870 b   |  31 lines
  1. regc4f( 5, %daycolor_r, %daycolor_g, %daycolor_b, %daycolor_a )
  2. regc4f( 7, %ambient_r, %ambient_g, %ambient_b, %ambient_a )
  3. pshader("
  4.  
  5. ;#include <consts.psh>
  6. ps_1_4
  7.  
  8. ;def c5, DAYCOLOR
  9. ;def    c7, AMBIENT
  10.  
  11. texld r0, t0    ;RGB=terrain colormap, A=terrain lightmap
  12. texld r1, t1    ;terrain detail
  13. texld r2, t2    ;road detail
  14. texld r3, t3    ;detailmasks
  15. texld r4, t4    ;clouds
  16. texld r5, t5    ;water deep
  17.  
  18. lrp r1.rgb, r3.b, r2, r1    ;terrain detail blend road detail with detailmasks = blended details
  19. +mul r0.a, 1-r4.a, r0.a     ; clouds shadow * terrain lightmap  = static lighting
  20.  
  21. mul r0.rgb, r0, r1          ;terrain color * blended details    = terrain
  22. +mad_sat r0.a, r0.a, c7.b, c7.a ;ambient + static lighting      = static lighting
  23.  
  24. mul r4, r0.a, c5            ;day
  25.  
  26. mul r0.rgb, r0, r4              ;light color
  27. +mov r0.a, r5.a
  28.  
  29. ")
  30.  
  31.